
On *:JOIN:#: {
  Set %VoiceList $read(VoiceList.txt,s, $nick $+ )
  If ( %VoiceList != $null ) {
    /mode # +v $nick

  }
}